ScrollBox a scrollovani

Otázka od: Jan Pukovec

26. 9. 2004 16:43

Zdravim,
poradi nekdo, jak

a) Scrollovat scrollbox ve kterem je TImage automaticky pri Dragu TImage?
(podobne jako je to u ACDSee - Chytnu obrazek, ktery je moc velky, takze
jsou videt scrollbary a odtahnu ho kam potrebuju, abych videl na pozadovany
kus obrazku)

b) Mizi mi pravy scrollbar Scrollboxu, kdyz menim velikost TImage, ktery je
na scrollboxu umisten
Mam vyresen zoom obrazku tak, ze jsem nastavil TImage.Scaled := true a pri
zoomu jednoduse menim Height a Width TImage.
Funguje to tak jak ma, scrollbox automaticky zacne zobrazovat scrollbary,
je-li treba (pri presahu TImage pres viditelnou plochu scrollboxu). Nekdy
(dost casto) se ale scrollboxy uplne zblazni a vubec se nezobrazi. Vypada to
jako by se musel Scrollbox "refreshovat", moc tomu nerozumim, takze se radsi
ptam zkusenejsich...

Dikes vsem,
w


Odpovedá: Jan Sebelik

27. 9. 2004 7:02

> b) Mizi mi pravy scrollbar Scrollboxu, kdyz menim velikost
> TImage, ktery je
> na scrollboxu umisten

Nevim, jestli je to totez, co se delo mne.

Tim, ze se zobrazi/zmizi scrollbar, meni se velikost plochy scrollboxu. Na to
se soucasne meni podminky pro Image v scrollboxu - jako jestli se tam vejde
nebo ne. V urcitych momentech se to jakoby "zacyklilo" - scrollbar zmizel,
zmenila se plocha, zmenily se tak podminky, scrollbar se objevil, zmenila se
plocha, ... Uplne se to rozblikalo.

Nakonec jsem to resil tak, ze jsem tam dal scrollbar natvrdo. Pokud si
vzpominam, nenasel jsem lepsi reseni, nez nekam na "neviditelne" misto pod
obrazek umistit treba TLabel. Scrollbar tam pak byl furt a problemy zmizely.

Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes.cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 569 (mobil 776 347 735)
====================================